for (i in c(2:15))

	{

	t.dir = paste('/home1/99/jc152199/tmp.pbs',i,'/',sep='')
	
	tfiles = list.files(t.dir, full.names=T)
	
	for (tfile in tfiles)
		
		{
		
		system(paste('rm ', tfile,sep=''))
		
		}
		
	}
	
# Close loop
			
			
	
	